Zmena pisma na celem formulari viz 1001 typu a triku - typ 364
Otázka od: jakub
8. 10. 2004 9:06
pouzivam konstrukci
GetPropInfo(Component[i].ClassInfo, 'Font');
...
a
SetOrdProp(....
Mam pozadavek nastavit pouze velikost pisma na celem formulari kde jsou
ruzne typy fontu.
lze vytahnout pouze Font.Size a nasledne ho nastavit ?
Dekuji za nakopnuti
JaVal
Odpovedá: Karel Kral
8. 10. 2004 10:28
TNeco podobneho by ti mohlo fungovat:
...
PropInfo := GetPropInfo(Component.ClassInfo, 'DataSource');
if PropInfo <> nil then
begin
ObjProp := GetObjectProp(Component, 'DataSource');
if ObjProp is TDataSource then
begin
SetObjectProp(Component, 'DataSource', DataSource);
Result := true;
Exit;
end;
end;
jakub napsal(a):
> pouzivam konstrukci
>
> GetPropInfo(Component[i].ClassInfo, 'Font');
> ...
>
> a
>
> SetOrdProp(....
>
> Mam pozadavek nastavit pouze velikost pisma na celem formulari kde jsou
> ruzne typy fontu.
>
> lze vytahnout pouze Font.Size a nasledne ho nastavit ?
>
> Dekuji za nakopnuti
>
> JaVal
>
>
>
>
--
______________________________________________________
Karel Kral, vedouci odd. IT / IT manager
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 547 235 000, 602 552 432, Fax: 547 231 203
E-Mail: mailto:kral@purus.cz, WWW: http://www.purus.cz
______________________________________________________